home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
wsc4vb24
/
install.bat
< prev
next >
Wrap
DOS Batch File
|
1999-06-01
|
2KB
|
66 lines
@ECHO OFF
REM
REM INSTALL.BAT
REM
REM Copy *.BAS and *.DLL files
REM
IF "%1" == "16" GOTO WIN16
IF "%1" == "32" GOTO WIN32
GOTO USAGE
:WIN16
ECHO ...Copying Win16 .BAS files
echo COPY WSC16.BAS WSC4VB.BAS
copy WSC16.BAS WSC4VB.BAS > NUL
echo COPY MIO16.BAS MIO.BAS
copy MIO16.BAS MIO.BAS > NUL
echo COPY XYDRV16.BAS XYDRV.BAS
copy XYDRV16.BAS XYDRV.BAS > NUL
echo COPY ASDRV16.BAS ASDRV.BAS
copy ASDRV16.BAS ASDRV.BAS > NUL
echo COPY ERRORS16.BAS ERRORS.BAS
copy ERRORS16.BAS ERRORS.BAS > NUL
GOTO COPYDLLS
:WIN32
ECHO ...Copying Win32 .BAS files
echo COPY WSC32.BAS WSC4VB.BAS
copy WSC32.BAS WSC4VB.BAS > NUL
echo COPY MIO32.BAS MIO.BAS
copy MIO32.BAS MIO.BAS > NUL
echo COPY XYDRV32.BAS XYDRV.BAS
copy XYDRV32.BAS XYDRV.BAS > NUL
echo COPY ASDRV32.BAS ASDRV.BAS
copy ASDRV32.BAS ASDRV.BAS > NUL
echo COPY ERRORS32.BAS ERRORS.BAS
copy ERRORS32.BAS ERRORS.BAS > NUL
:COPYDLLS
if (%windir%) == () goto WIN31
echo COPY WSC32.DLL %windir%
copy WSC32.DLL %windir% > NUL
echo COPY MIO32.DLL %windir%
copy MIO32.DLL %windir% > NUL
echo COPY XYDRV32.DLL %windir%
copy XYDRV32.DLL %windir% > NUL
echo COPY ASDRV32.DLL %windir%
copy ASDRV32.DLL %windir% > NUL
:WIN31
echo COPY WSC16.DLL %windir%
copy WSC16.DLL %windir% > NUL
echo COPY MIO16.DLL %windir%
copy MIO16.DLL %windir% > NUL
echo COPY XYDRV16.DLL %windir%
copy XYDRV16.DLL %windir% > NUL
echo COPY ASDRV16.DLL %windir%
copy ASDRV16.DLL %windir% > NUL
echo WSC4VB installation completed.
goto DONE
:USAGE
ECHO ERROR. Usage is:
ECHO 'INSTALL 16' Win16 Visual Basic (VB 3)
ECHO 'INSTALL 32' Win32 Visual Basic (VB 4+)
:DONE